home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
B Soft 6
/
B-Soft_6_19xx_Maik__Mike_de_Side_B.d64
/
check den flewar
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
2KB
|
47 lines
39 rem --------------------------------
40 rem b-soft
41 rem mike witschi und maik holstein
42 rem henningstr. 13
43 rem 21337 lueneburg
44 rem --------------------------------
50 poke53280,6:poke53281,6:z$=chr$(34)
100 print"[147]vorgeschichte"
101 print"die gallige henne krampft streuselnd auf";
102 print"dem veranda-kaktus umher. daraufhin der"
103 print"baessliche hollo: "z$"dein gesicht und mein";
104 print"arsch koennten gute freunde sein!"z$" der"
105 print"fohlenmops verkrampfte und aus den augen";
106 print"dampfte: "z$"meine haie, sie haben zwei me-";
107 print"ter lange katzen, fast wie ein bein."z$
108 print"genug mit dem gekroese, sonst stinkt die";
109 print"alte moese. gut. genau. geht's los? du"
110 print"arsch! und du machst"
111 print"(1) mit einem nasenloch popelweitziel-";:print" schiessen veranstalten"
112 print"(2) hundehaft bejahen"
113 print"(3) aus deinen schamhaaren eine stepp-"
114 print" decke stricken"
115 gosub9999
116 ifa$="1"then200
117 ifa$="2"then300
118 ifa$="3"then400
119 goto115
200 print"[147]die heizung wird sich von der wand di-"
201 print"rekt in deinen arsch bewegen, dein arsch";
202 print"wird sich auf hundert grad erhitzen, und";
203 print"aus dem duennschiss kannst du dir 'ne"
204 print"schoene suppe kochen.":goto2000
300 print"[147]amoeben zerfetzen dir mit ihren reiss-"
301 print"zaehnen deinen teppich, und der muell-"
302 print"mann kotzt vor deiner haustuer einen"
303 print"falschen zehntausendmarkschein aus. coo-";
304 print"les galgenratenwort!":goto2000
400 print"[147]die decke bepimpft die unglaubliche men-";
401 print"ge von 2,6 menschen. diese bewirken,"
402 print"dass du dieses spiel gewinnst. super!"
403 print"juchhu!":print"gewonnen!"
404 print"[158]geschrieben am 11.04.1999 von"
405 print"psycho, sad und jtr!":end
2000 print"verloren, hae hae!":gosub9999:run
9999 geta$:ifa$=""then9999
10000 return